home *** CD-ROM | disk | FTP | other *** search
/ Nejlepší České Hry / Nej české hry.iso / hry / vesmirna becherovka / 2004 Vesmírná Becherovka / Becherovka.exe / scripts / DefineSprite_3463 / frame_1 / DoAction.as
Encoding:
Text File  |  2004-09-30  |  1.2 KB  |  45 lines
  1. function Speak(Osoba, SText, Orient, EngText, Driver)
  2. {
  3.    if(Orient == "R")
  4.    {
  5.       X = getProperty(Osoba, _X) + Osoba.hx * Osoba._xscale / 100;
  6.    }
  7.    else
  8.    {
  9.       X = getProperty(Osoba, _X) - Osoba.hx * Osoba._xscale / 100;
  10.    }
  11.    Y = getProperty(Osoba, _Y) + Osoba.hy * Osoba._yscale / 100;
  12.    if(!_root.menu.Eng)
  13.    {
  14.       _root.s.bubble.Text = SText;
  15.    }
  16.    else
  17.    {
  18.       _root.s.bubble.Text = EngText;
  19.    }
  20.    trace(_root.s.bubble._x);
  21.    trace(_root.s.bubble._y);
  22.    _root.s.bubble.Count = 12 + length(SText);
  23.    _root.s.bubble.i = 1;
  24.    _root.s.bubble.Osoba = Osoba;
  25.    _root.s.bubble.Driver = Driver;
  26.    _root.s.bubble.Orient = Orient;
  27.    if(Orient == "R" or eval(osoba) == hero)
  28.    {
  29.       _root.s.bubble.gotoAndPlay(4);
  30.       setProperty("_root.s.bubble", _X, X + Osoba._width / 1.5);
  31.    }
  32.    else
  33.    {
  34.       _root.s.bubble.gotoAndPlay(2);
  35.       setProperty("_root.s.bubble", _X, X - Osoba._width / 1.5);
  36.    }
  37.    setProperty("_root.s.bubble", _Y, Y - 30 * Osoba._xscale / 100);
  38. }
  39. back1.prisoners.gotoAndStop("down");
  40. back1.vejdr.gotoAndPlay("wait");
  41. hero.gotoAndPlay("wait");
  42. control = true;
  43. strike._visible = false;
  44. stop();
  45.